home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 02 - 1986 / 02.03 Mar 86.sit / 02.03 Mar 86 / Modula2 2-3 / resource mover / MoveResources.DEF < prev    next >
MacBinary  |  1986-01-11  |  2.4 KB  |  [TEXT/EDIT]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sat Jan 11 13:52:45 1986, modified Sat Jan 11 13:52:45 1986, creator Macintosh Edit, type ASCII, 1666 bytes "MoveResources.DEF" , at 0x702 490 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[EDIT]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 11 4d 6f 76 65 52 65 | 73 6f 75 72 63 65 73 2e |..MoveRe|sources.|
|00000010| 44 45 46 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |DEF.....|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 06 82 00 | 00 01 ea 9a 4c 66 fd 9a |........|....Lf..|
|00000060| 4c 66 fd 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |Lf......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 1c e2 00 00 |........|........|
|00000080| 28 2a 20 54 6f 6d 20 54 | 61 79 6c 6f 72 0d 09 20 |(* Tom T|aylor.. |
|00000090| 33 37 30 37 20 50 6f 69 | 6e 63 69 61 6e 61 20 44 |3707 Poi|nciana D|
|000000a0| 72 2e 20 23 31 33 37 0d | 09 20 53 61 6e 74 61 20 |r. #137.|. Santa |
|000000b0| 43 6c 61 72 61 2c 20 43 | 41 20 39 35 30 35 31 0d |Clara, C|A 95051.|
|000000c0| 2a 29 0d 44 45 46 49 4e | 49 54 49 4f 4e 20 4d 4f |*).DEFIN|ITION MO|
|000000d0| 44 55 4c 45 20 4d 6f 76 | 65 52 65 73 6f 75 72 63 |DULE Mov|eResourc|
|000000e0| 65 73 3b 0d 0d 09 28 2a | 20 54 68 69 73 20 6d 6f |es;...(*| This mo|
|000000f0| 64 75 6c 65 20 69 73 20 | 75 73 65 64 20 66 6f 72 |dule is |used for|
|00000100| 20 63 6f 70 79 69 6e 67 | 0d 09 20 20 20 72 65 73 | copying|.. res|
|00000110| 6f 75 72 63 65 73 20 66 | 72 6f 6d 20 6f 6e 65 20 |ources f|rom one |
|00000120| 66 69 6c 65 20 74 6f 20 | 61 6e 6f 74 68 65 72 2e |file to |another.|
|00000130| 20 2a 29 0d 0d 09 46 52 | 4f 4d 20 52 65 73 6f 75 | *)...FR|OM Resou|
|00000140| 72 63 65 4d 61 6e 61 67 | 65 72 20 49 4d 50 4f 52 |rceManag|er IMPOR|
|00000150| 54 0d 09 09 52 65 73 54 | 79 70 65 3b 0d 09 09 0d |T...ResT|ype;....|
|00000160| 09 45 58 50 4f 52 54 20 | 51 55 41 4c 49 46 49 45 |.EXPORT |QUALIFIE|
|00000170| 44 0d 09 09 52 73 72 63 | 45 72 72 54 79 70 65 2c |D...Rsrc|ErrType,|
|00000180| 20 52 73 72 63 45 72 72 | 2c 0d 09 09 4d 6f 76 65 | RsrcErr|,...Move|
|00000190| 52 73 72 63 73 2c 20 43 | 6c 65 61 72 52 73 72 63 |Rsrcs, C|learRsrc|
|000001a0| 46 69 6c 65 3b 0d 0d 20 | 20 54 59 50 45 0d 09 09 |File;.. | TYPE...|
|000001b0| 28 2a 20 50 6f 73 73 69 | 62 6c 65 20 65 72 72 6f |(* Possi|ble erro|
|000001c0| 72 73 20 64 75 72 69 6e | 67 20 61 20 72 65 73 6f |rs durin|g a reso|
|000001d0| 75 72 63 65 20 63 6f 70 | 79 20 2a 29 0d 09 09 52 |urce cop|y *)...R|
|000001e0| 73 72 63 45 72 72 54 79 | 70 65 20 3d 20 28 6e 6f |srcErrTy|pe = (no|
|000001f0| 52 73 72 63 45 72 72 6f | 72 2c 0d 09 09 09 09 09 |RsrcErro|r,......|
|00000200| 09 09 09 09 20 64 75 70 | 6c 69 63 61 74 65 52 73 |.... dup|licateRs|
|00000210| 72 63 2c 0d 09 09 09 09 | 09 09 09 09 09 20 6f 74 |rc,.....|..... ot|
|00000220| 68 65 72 52 73 72 63 45 | 72 72 6f 72 29 3b 0d 20 |herRsrcE|rror);. |
|00000230| 20 20 20 52 73 72 63 45 | 72 72 20 3d 20 52 45 43 | RsrcE|rr = REC|
|00000240| 4f 52 44 0d 09 09 09 09 | 09 09 09 09 65 72 72 54 |ORD.....|....errT|
|00000250| 79 70 65 20 3a 20 52 73 | 72 63 45 72 72 54 79 70 |ype : Rs|rcErrTyp|
|00000260| 65 3b 20 0d 09 09 09 09 | 09 09 09 09 43 41 53 45 |e; .....|....CASE|
|00000270| 20 52 73 72 63 45 72 72 | 54 79 70 65 20 4f 46 0d | RsrcErr|Type OF.|
|00000280| 09 09 09 09 09 09 09 09 | 09 64 75 70 6c 69 63 61 |........|.duplica|
|00000290| 74 65 52 73 72 63 3a 20 | 64 75 70 49 6e 66 6f 20 |teRsrc: |dupInfo |
|000002a0| 3a 0d 09 09 09 09 09 09 | 09 09 09 09 52 45 43 4f |:.......|....RECO|
|000002b0| 52 44 09 0d 09 09 09 09 | 09 09 09 09 09 09 28 2a |RD......|......(*|
|000002c0| 20 54 68 65 20 49 44 20 | 61 6e 64 20 74 79 70 65 | The ID |and type|
|000002d0| 20 6f 66 0d 09 09 09 09 | 09 09 09 09 09 09 20 20 | of.....|...... |
|000002e0| 20 74 68 65 20 6f 66 66 | 65 6e 64 69 6e 67 20 64 | the off|ending d|
|000002f0| 75 70 6c 69 63 61 74 65 | 0d 09 09 09 09 09 09 09 |uplicate|........|
|00000300| 09 09 09 09 20 72 65 73 | 6f 75 72 63 65 2e 20 2a |.... res|ource. *|
|00000310| 29 0d 09 09 09 09 09 09 | 09 09 09 09 09 64 75 70 |).......|.....dup|
|00000320| 49 44 20 3a 20 49 4e 54 | 45 47 45 52 3b 0d 09 09 |ID : INT|EGER;...|
|00000330| 09 09 09 09 09 09 09 09 | 09 64 75 70 54 79 70 65 |........|.dupType|
|00000340| 20 3a 20 52 65 73 54 79 | 70 65 3b 0d 09 09 09 09 | : ResTy|pe;.....|
|00000350| 09 09 09 09 09 09 45 4e | 44 3b 0d 09 09 09 09 09 |......EN|D;......|
|00000360| 09 09 09 7c 09 6f 74 68 | 65 72 52 73 72 63 45 72 |...|.oth|erRsrcEr|
|00000370| 72 6f 72 3a 20 65 72 72 | 4e 75 6d 20 3a 0d 09 09 |ror: err|Num :...|
|00000380| 09 09 09 09 09 09 09 09 | 28 2a 20 4d 61 63 20 65 |........|(* Mac e|
|00000390| 72 72 6f 72 20 6e 75 6d | 62 65 72 20 2a 29 0d 09 |rror num|ber *)..|
|000003a0| 09 09 09 09 09 09 09 09 | 09 49 4e 54 45 47 45 52 |........|.INTEGER|
|000003b0| 3b 0d 09 09 09 09 09 09 | 09 09 45 4c 53 45 0d 09 |;.......|..ELSE..|
|000003c0| 09 09 09 09 09 09 09 45 | 4e 44 3b 0d 09 09 09 09 |.......E|ND;.....|
|000003d0| 09 09 09 45 4e 44 3b 0d | 0d 20 20 50 52 4f 43 45 |...END;.|. PROCE|
|000003e0| 44 55 52 45 20 4d 6f 76 | 65 52 73 72 63 73 20 28 |DURE Mov|eRsrcs (|
|000003f0| 73 72 63 2c 20 64 65 73 | 74 20 3a 20 49 4e 54 45 |src, des|t : INTE|
|00000400| 47 45 52 3b 0d 20 20 20 | 20 20 20 20 20 20 20 20 |GER;. | |
|00000410| 20 20 20 20 20 20 20 20 | 20 20 20 20 6e 6f 69 73 | | nois|
|00000420| 79 20 3a 20 42 4f 4f 4c | 45 41 4e 3b 0d 09 09 09 |y : BOOL|EAN;....|
|00000430| 09 09 09 09 09 09 09 09 | 20 61 6c 6c 6f 77 44 75 |........| allowDu|
|00000440| 70 6c 69 63 61 74 65 20 | 3a 20 42 4f 4f 4c 45 41 |plicate |: BOOLEA|
|00000450| 4e 3b 0d 09 09 20 20 20 | 20 20 20 09 09 09 09 09 |N;... | .....|
|00000460| 09 20 56 41 52 20 65 72 | 72 6f 72 20 3a 20 52 73 |. VAR er|ror : Rs|
|00000470| 72 63 45 72 72 29 3b 0d | 09 28 2a 20 4d 6f 76 65 |rcErr);.|.(* Move|
|00000480| 73 20 61 6c 6c 20 72 65 | 73 6f 75 72 63 65 73 20 |s all re|sources |
|00000490| 66 72 6f 6d 20 74 68 65 | 20 73 72 63 20 72 65 73 |from the| src res|
|000004a0| 6f 75 72 63 65 0d 09 20 | 20 20 66 69 6c 65 20 6e |ource.. | file n|
|000004b0| 75 6d 62 65 72 20 74 6f | 20 74 68 65 20 64 65 73 |umber to| the des|
|000004c0| 74 20 72 65 73 6f 75 72 | 63 65 20 66 69 6c 65 20 |t resour|ce file |
|000004d0| 6e 75 6d 62 65 72 2e 0d | 09 09 20 49 66 20 6e 6f |number..|.. If no|
|000004e0| 69 73 79 20 69 73 20 74 | 72 75 65 2c 20 74 68 65 |isy is t|rue, the|
|000004f0| 6e 20 69 6e 66 6f 72 6d | 61 74 69 6f 6e 20 69 73 |n inform|ation is|
|00000500| 20 70 72 69 6e 74 65 64 | 0d 09 09 20 61 62 6f 75 | printed|... abou|
|00000510| 74 20 65 61 63 68 20 72 | 65 73 6f 75 72 63 65 20 |t each r|esource |
|00000520| 61 73 20 69 74 20 69 73 | 20 63 6f 70 69 65 64 2e |as it is| copied.|
|00000530| 20 20 49 66 0d 09 09 20 | 61 6c 6c 6f 77 44 75 70 | If... |allowDup|
|00000540| 6c 69 63 61 74 65 20 69 | 73 20 74 72 75 65 2c 20 |licate i|s true, |
|00000550| 74 68 65 6e 20 61 20 64 | 65 73 74 69 6e 61 74 69 |then a d|estinati|
|00000560| 6f 6e 0d 09 09 20 72 65 | 73 6f 75 72 63 65 20 6f |on... re|source o|
|00000570| 66 20 74 68 65 20 73 61 | 6d 65 20 74 79 70 65 20 |f the sa|me type |
|00000580| 61 6e 64 20 49 44 20 61 | 73 20 61 20 73 6f 75 72 |and ID a|s a sour|
|00000590| 63 65 0d 09 09 20 72 65 | 73 6f 75 72 63 65 20 69 |ce... re|source i|
|000005a0| 73 20 72 65 70 6c 61 63 | 65 64 20 62 79 20 74 68 |s replac|ed by th|
|000005b0| 65 20 73 6f 75 72 63 65 | 20 72 65 73 6f 75 72 63 |e source| resourc|
|000005c0| 65 2e 0d 09 09 20 49 66 | 20 61 6c 6c 6f 77 44 75 |e.... If| allowDu|
|000005d0| 70 6c 69 63 61 74 65 20 | 69 73 20 66 61 6c 73 65 |plicate |is false|
|000005e0| 2c 20 74 68 65 6e 20 61 | 6e 20 65 72 72 6f 72 20 |, then a|n error |
|000005f0| 69 73 0d 09 09 20 72 65 | 74 75 72 6e 65 64 20 77 |is... re|turned w|
|00000600| 68 65 6e 20 61 20 64 75 | 70 6c 69 63 61 74 65 20 |hen a du|plicate |
|00000610| 69 73 20 66 6f 75 6e 64 | 2e 20 2a 29 0d 0d 09 50 |is found|. *)...P|
|00000620| 52 4f 43 45 44 55 52 45 | 20 43 6c 65 61 72 52 73 |ROCEDURE| ClearRs|
|00000630| 72 63 46 69 6c 65 0d 09 | 09 09 09 09 09 09 09 09 |rcFile..|........|
|00000640| 28 66 69 6c 65 3a 41 52 | 52 41 59 20 4f 46 20 43 |(file:AR|RAY OF C|
|00000650| 48 41 52 29 20 3a 20 49 | 4e 54 45 47 45 52 3b 0d |HAR) : I|NTEGER;.|
|00000660| 09 28 2a 20 43 6c 65 61 | 72 73 20 61 6c 6c 20 72 |.(* Clea|rs all r|
|00000670| 65 73 6f 75 72 63 65 73 | 20 69 6e 20 74 68 65 20 |esources| in the |
|00000680| 72 65 73 6f 75 72 63 65 | 20 66 69 6c 65 0d 09 09 |resource| file...|
|00000690| 20 73 70 65 63 69 66 69 | 65 64 20 62 79 20 27 66 | specifi|ed by 'f|
|000006a0| 69 6c 65 27 2e 20 20 43 | 6c 65 61 72 52 73 72 63 |ile'. C|learRsrc|
|000006b0| 46 69 6c 65 20 72 65 74 | 75 72 6e 73 0d 09 09 20 |File ret|urns... |
|000006c0| 30 20 69 66 20 6e 6f 20 | 65 72 72 6f 72 20 6f 63 |0 if no |error oc|
|000006d0| 63 75 72 65 64 20 6f 72 | 20 74 68 65 20 65 72 72 |cured or| the err|
|000006e0| 6f 72 20 6e 75 6d 62 65 | 72 2e 20 2a 29 0d 0d 45 |or numbe|r. *)..E|
|000006f0| 4e 44 20 4d 6f 76 65 52 | 65 73 6f 75 72 63 65 73 |ND MoveR|esources|
|00000700| 2e 0d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 d4 |........|........|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 11 4d 6f 76 65 52 65 73 | 6f 75 72 63 65 73 2e 44 |.MoveRes|ources.D|
|000007c0| 45 46 02 00 00 00 54 45 | 58 54 45 44 49 54 01 00 |EF....TE|XTEDIT..|
|000007d0| 00 00 54 45 58 54 45 44 | 49 54 01 00 ff ff 00 2a |..TEXTED|IT.....*|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 99 bc be 6c 00 00 | 06 82 00 00 01 ea 00 00 |.....l..|........|
|00000800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f 2d 00 00 |.......M|onaco-..|
|00000890| 00 04 00 06 00 02 00 00 | 01 00 00 00 01 16 00 00 |........|........|
|000008a0| 00 16 00 00 00 d4 00 00 | cc 1c 00 98 00 00 00 1c |........|........|
|000008b0| 00 46 00 01 45 46 4e 54 | 00 00 00 12 45 54 41 42 |.F..EFNT|....ETAB|
|000008c0| 00 00 00 1e 03 eb 00 00 | 00 00 00 00 00 01 6e e8 |........|......n.|
|000008d0| 03 ec 00 47 00 00 00 0e | 00 01 6e cc 46 4f 42 4a |...G....|..n.FOBJ|
|000008e0| ff ff ff ff 00 07 69 f6 | 00 07 6a 1e 00 07 6a 48 |......i.|..j...jH|
|000008f0| 00 07 6a 68 00 07 6a 7a | 00 07 6a 8c 00 40 01 b6 |..jh..jz|..j..@..|
|00000900| 00 07 67 d6 00 07 75 e8 | 00 07 6a 9e 00 40 01 be |..g...u.|..j..@..|
|00000910| 00 40 01 be 00 40 01 be | 00 40 01 be 00 40 01 be |.@...@..|.@...@..|
|00000920| 00 40 01 46 4f 42 4a ff | ff ff ff 00 07 69 f6 00 |.@.FOBJ.|.....i..|
|00000930| 07 6a 1e 00 07 6a 48 00 | 07 6a 68 00 07 6a 7a 00 |.j...jH.|.jh..jz.|
|00000940| 07 6a 8c 00 40 01 b6 00 | 07 67 d6 00 07 75 e8 00 |.j..@...|.g...u..|
|00000950| 07 6a 9e 00 40 01 be 00 | 40 01 be 00 40 01 be 00 |.j..@...|@...@...|
|00000960| 40 01 be 00 40 01 be 00 | 40 01 00 00 00 00 00 00 |@...@...|@.......|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+